Шаг 67 - Объект TextStream.

Облегчает последовательный доступ к файлу.

Пример
В следующем коде используеться объект TextStream, возвращенный CreateTextFile методом объекта FileSystemObject:

Dim fso, MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile= fso.CreateTextFile("c:\testfile.txt", True)
MyFile.WriteLine("This is a test.")
MyFile.Close

Свойства
AtEndOfLine
AtEndOfStream
Column
Line

Методы
Close
Read
ReadAll
ReadLine
Skip
SkipLine
Write
WriteBlankLines
WriteLine

Hosted by uCoz